home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1994 November: Tool Chest / Dev.CD Nov 94.toast / Sample Code / Snippets / Toolbox / Scrap Parsing / Simple.r < prev    next >
Encoding:
Text File  |  1993-03-24  |  3.9 KB  |  248 lines  |  [TEXT/MPS ]
  1. #include "OldTypes.r"
  2. resource 'MENU' (128, preload) {
  3.     128,
  4.     textMenuProc,
  5.     0x7FFFFFFD,
  6.     enabled,
  7.     apple,
  8.     {    /* array: 2 elements */
  9.         /* [1] */
  10.         "About", noIcon, noKey, noMark, plain,
  11.         /* [2] */
  12.         "-", noIcon, noKey, noMark, plain
  13.     }
  14. };
  15.  
  16. resource 'MENU' (129, preload) {
  17.     129,
  18.     textMenuProc,
  19.     0xE00,
  20.     enabled,
  21.     "File",
  22.     {    /* array: 10 elements */
  23.         /* [1] */
  24.         "New", noIcon, "N", noMark, plain,
  25.         /* [2] */
  26.         "Open", noIcon, "O", noMark, plain,
  27.         /* [3] */
  28.         "Close", noIcon, "W", noMark, plain,
  29.         /* [4] */
  30.         "Save", noIcon, "S", noMark, plain,
  31.         /* [5] */
  32.         "Save As...", noIcon, noKey, noMark, plain,
  33.         /* [6] */
  34.         "-", noIcon, noKey, noMark, plain,
  35.         /* [7] */
  36.         "Page Setup...", noIcon, noKey, noMark, plain,
  37.         /* [8] */
  38.         "Print...", noIcon, "P", noMark, plain,
  39.         /* [9] */
  40.         "-", noIcon, noKey, noMark, plain,
  41.         /* [10] */
  42.         "Quit", noIcon, "Q", noMark, plain
  43.     }
  44. };
  45.  
  46. resource 'MENU' (130, preload) {
  47.     130,
  48.     textMenuProc,
  49.     0x3400,
  50.     enabled,
  51.     "Edit",
  52.     {    /* array: 6 elements */
  53.         /* [1] */
  54.         "Undo", noIcon, "Z", noMark, plain,
  55.         /* [2] */
  56.         "-", noIcon, noKey, noMark, plain,
  57.         /* [3] */
  58.         "Cut", noIcon, "X", noMark, plain,
  59.         /* [4] */
  60.         "Copy", noIcon, "C", noMark, plain,
  61.         /* [5] */
  62.         "Paste", noIcon, "V", noMark, plain,
  63.         /* [6] */
  64.         "Clear", noIcon, noKey, noMark, plain
  65.     }
  66. };
  67.  
  68. resource 'MENU' (131) {
  69.     131,
  70.     textMenuProc,
  71.     0x7FFFFFD6,
  72.     enabled,
  73.     "Test Stuff",
  74.     {    /* array: 1 elements */
  75.         /* [1] */
  76.         "Add whatever you want", noIcon, noKey, noMark, plain
  77.     }
  78. };
  79.  
  80. resource 'DITL' (128, purgeable) {
  81.     {    /* array DITLarray: 4 elements */
  82.         /* [1] */
  83.         {164, 115, 184, 185},
  84.         Button {
  85.             enabled,
  86.             "OK"
  87.         },
  88.         /* [2] */
  89.         {5, 10, 43, 290},
  90.         StaticText {
  91.             disabled,
  92.             "The Simplest Shell"
  93.         },
  94.         /* [3] */
  95.         {76, 3, 154, 301},
  96.         StaticText {
  97.             disabled,
  98.             "FredWare from Apple Developer Technical "
  99.             "Support, ADS group.\nCopyright ©  1991-1993 Ap"
  100.             "ple Computer Inc.\nWritten by C.K. Haun ("
  101.             "<TR>)."
  102.         },
  103.         /* [4] */
  104.         {53, 82, 71, 227},
  105.         StaticText {
  106.             disabled,
  107.             "version 1.0d1"
  108.         }
  109.     }
  110. };
  111.  
  112. resource 'DITL' (129, purgeable) {
  113.     {    /* array DITLarray: 2 elements */
  114.         /* [1] */
  115.         {170, 90, 190, 148},
  116.         Button {
  117.             enabled,
  118.             "OK"
  119.         },
  120.         /* [2] */
  121.         {10, 40, 62, 204},
  122.         StaticText {
  123.             disabled,
  124.             "Help information should go here"
  125.         }
  126.     }
  127. };
  128.  
  129. resource 'DITL' (130, purgeable) {
  130.     {    /* array DITLarray: 3 elements */
  131.         /* [1] */
  132.         {80, 100, 100, 158},
  133.         Button {
  134.             enabled,
  135.             "Exit"
  136.         },
  137.         /* [2] */
  138.         {10, 80, 27, 237},
  139.         StaticText {
  140.             disabled,
  141.             "Bad System Version!"
  142.         },
  143.         /* [3] */
  144.         {50, 25, 66, 232},
  145.         StaticText {
  146.             disabled,
  147.             "Requires System 7 or greater."
  148.         }
  149.     }
  150. };
  151.  
  152. resource 'ALRT' (128, purgeable) {
  153.     {40, 40, 229, 363},
  154.     128,
  155.     {    /* array: 4 elements */
  156.         /* [1] */
  157.         OK, visible, sound1,
  158.         /* [2] */
  159.         OK, visible, sound1,
  160.         /* [3] */
  161.         OK, visible, sound1,
  162.         /* [4] */
  163.         OK, visible, sound1
  164.     }
  165. };
  166.  
  167. resource 'ALRT' (130, purgeable) {
  168.     {40, 40, 149, 296},
  169.     130,
  170.     {    /* array: 4 elements */
  171.         /* [1] */
  172.         OK, visible, sound1,
  173.         /* [2] */
  174.         OK, visible, sound1,
  175.         /* [3] */
  176.         OK, visible, sound1,
  177.         /* [4] */
  178.         OK, visible, sound1
  179.     }
  180. };
  181.  
  182. resource 'MBAR' (128) {
  183.     {    /* array MenuArray: 4 elements */
  184.         /* [1] */
  185.         128,
  186.         /* [2] */
  187.         129,
  188.         /* [3] */
  189.         130,
  190.         /* [4] */
  191.         131
  192.     }
  193. };
  194.  
  195. resource 'WIND' (128, purgeable) {
  196.     {40, 40, 310, 572},
  197.     documentProc,
  198.     visible,
  199.     noGoAway,
  200.     0x0,
  201.     "Simple"
  202. };
  203.  
  204. resource 'SIZE' (-1) {
  205.     reserved,
  206.     acceptSuspendResumeEvents,
  207.     reserved,
  208.     canBackground,
  209.     multiFinderAware,
  210.     backgroundAndForeground,
  211.     dontGetFrontClicks,
  212.     ignoreChildDiedEvents,
  213.     is32BitCompatible,
  214.     isHighLevelEventAware,
  215.     localAndRemoteHLEvents,
  216.     notStationeryAware,
  217.     dontUseTextEditServices,
  218.     reserved,
  219.     reserved,
  220.     reserved,
  221.     50000,
  222.     50000
  223. };
  224.  
  225. resource 'STR ' (128) {
  226.     "Simple Help..."
  227. };
  228.  
  229. resource 'DLOG' (129, "Sample Help Dialog", purgeable) {
  230.     {34, 40, 234, 280},
  231.     dBoxProc,
  232.     visible,
  233.     goAway,
  234.     0x0,
  235.     129,
  236.     ""
  237. };
  238.  
  239.  
  240.  
  241. resource 'STR#'(128,purgeable)
  242. {{
  243. "Current Scrap contents",
  244. "OS Type: ",
  245. "  Size: "
  246.  
  247.  
  248. }};